# NOT RUN {
file <- system.file("external/ndvi", package="rts")
ndvi <- rts(file) # read the ndvi time series from the specified file
s1 <- ndvi[["2000-01-01/2000-05-31"]]
s1
plot(s1)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab